home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / winsock / ircii2-6.zip / SRC\IRCII-2.6\SCRIPT\DMSG < prev    next >
Text File  |  1994-12-28  |  365b  |  18 lines
  1. alias dmsg.fixup {
  2.   @ dmsg.tmp = index(, $0) + 1
  3.   if (dmsg.tmp > 0) {
  4.     @ function_return = mid(0 $dmsg.tmp $0) ## [=] ## dmsg.fixup($mid($dmsg.tmp -1 $0))
  5.   } {
  6.     @ function_return = [$0]
  7.   }
  8.   ^assign -dmsg.tmp
  9. }
  10.  
  11. alias dmsg {
  12.   @ dmsg.r = max_recursions
  13.   ^set max_recursions 20
  14.   msg =$dmsg.fixup($0) $1-
  15.   ^set max_recursions $dmsg.r
  16.   ^assign -dmsg.r
  17. }
  18.